home *** CD-ROM | disk | FTP | other *** search
- on mouseDown
- global gCurrentSlide, gNumberofSlides
- set the castNum of sprite 13 to cast "b015"
- if gCurrentSlide < gNumberofSlides then
- if pressChronologyButton(13) then
- sound stop 2
- set gCurrentSlide to gCurrentSlide + 1
- if gCurrentSlide = 7 then
- set the castNum of sprite 12 to cast "7/7"
- set the castNum of sprite 13 to cast "blanknext"
- set the castNum of sprite 14 to cast "b017"
- set the castNum of sprite 16 to cast "t7"
- updateStage()
- set the castNum of sprite 17 to cast "p7"
- puppetTransition(11, 8, 12, 1)
- updateStage()
- else
- set the castNum of sprite 12 to cast (gCurrentSlide & "/7")
- set the castNum of sprite 13 to cast "b015"
- set the castNum of sprite 14 to cast "b017"
- set the castNum of sprite 16 to cast ("t" & gCurrentSlide)
- updateStage()
- set the castNum of sprite 17 to cast ("p" & gCurrentSlide)
- puppetTransition(11, 8, 12, 1)
- updateStage()
- end if
- narrate()
- end if
- else
- set the castNum of sprite 13 to cast "blanknext"
- end if
- end
-